home *** CD-ROM | disk | FTP | other *** search
/ Aminet 19 / Aminet 19 (1997)(GTI - Schatztruhe)[!][Jun 1997].iso / Aminet / dev / c / vbcc.lha / vbcc / machines / amiga68k / libsrc / stdio / _flushbuf.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-06-17  |  471 b   |  20 lines
  1. #include <stdio.h>
  2.  
  3. /*  schreibt noch uebrige Daten aus Buffer  */
  4. int _flushbuf(FILE *f)
  5. {
  6.     _chkabort();
  7.     if(!f) return(EOF);
  8.     if(!f->bufsize){if(f->flags&_UNBUF) f->bufsize=1; else f->bufsize=BUFSIZ;}
  9.     if(!f->base) return(0);
  10.     if(f->flags&_WRITE){
  11.         int len=f->bufsize-f->count;
  12.         if(Write(f->filehandle,f->base,len)!=len)
  13.             return(EOF);
  14.     }
  15.     f->pointer=f->base;
  16.     f->count=0;
  17.     f->flags&=~(_READ|_WRITE);
  18.     return(0);
  19. }
  20.